(rmail-message-subject-p):

Handle message whose header has not been reformatted.

diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el
index df01543f2d1deed1245c00196a142f786c4efd87..42cdbbb384f206a744b3bd7f3013bc95d89b5b31 100644 (file)
--- a/lisp/mail/rmailsum.el
+++ b/lisp/mail/rmailsum.el
@@ -131,7 +131,7 @@ SUBJECT is a string of regexps separated by commas."
 (defun rmail-message-subject-p (msg subject &optional whole-message)
   (save-restriction
     (goto-char (rmail-msgbeg msg))
-    (search-forward "\n*** EOOH ***\n")
+    (search-forward "\n*** EOOH ***\n" (rmail-msgend msg) 'move)
     (narrow-to-region
      (point)
      (progn (search-forward (if whole-message "\^_" "\n\n")) (point)))